home *** CD-ROM | disk | FTP | other *** search
/ Aminet 21 / Aminet 21 (1997)(GTI - Schatztruhe)[!][Oct 1997].iso / Aminet / comm / misc / nVmDIZ.lha / nVmDIZ / nVmDIZ_Install < prev    next >
Encoding:
Text File  |  1997-07-08  |  1.2 KB  |  51 lines
  1. ;Installer script for nVmDIZ
  2.  
  3. (message 
  4.   "\n\n\nnVmDIZ 0.5 from nEVERmIND productions"
  5.   (ALL)
  6. )
  7.  
  8. (set #DEST
  9.   (askdir
  10.     (prompt "Where do you want to have nVmDIZ executable?")
  11.     (help (cat @askdir-help)
  12.     )
  13.     (default "Work:")
  14.   )
  15. )
  16.  
  17. (copyfiles (dest #DEST) (source "nVmDIZ"))
  18. (copyfiles (dest #DEST) (source "nVmDIZ.info"))
  19. (copyfiles (dest "ENVARC:") (source "nVmDIZ.archivers"))
  20. (copyfiles (dest "ENVARC:") (source "nVmDIZ.diz"))
  21.  
  22. (set #DEST1
  23.   (askdir
  24.     (prompt "Where do you want to have nVmDIZ documentation?")
  25.     (help (cat @askdir-help))
  26.     (default #DEST)
  27.   )
  28. )
  29.  
  30. (copyfiles (dest #DEST1) (source "nVmDIZ.doc"))
  31. (copyfiles (dest #DEST1) (source "nVmDIZ.doc.info"))
  32.  
  33. (run "Run SYS:Utilities/More DIZPreview")
  34.  
  35. (set #DIZ
  36.    (askchoice
  37.    (prompt "Choose DIZ file")
  38.    (help (cat @askchoice-help))
  39.    (default 0)
  40.    (choices
  41.       "#1: 10 lines"
  42.       "#2: 4 lines"
  43.       "#3: 2 lines"
  44.       )
  45.    )
  46. )
  47.  
  48. (if (= #DIZ 1) (copyfiles (source "nVmDIZ.diz") (dest "ENVARC:") (newname "nVmDIZ.diz") (optional "nofail")) )
  49. (if (= #DIZ 2) (copyfiles (source "nVmDIZ2.diz") (dest "ENVARC:") (newname "nVmDIZ.diz") (optional "nofail")) )
  50. (if (= #DIZ 3) (copyfiles (source "nVmDIZ3.diz") (dest "ENVARC:") (newname "nVmDIZ.diz") (optional "nofail")) )
  51.